home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #11 / Amiga Plus CD - 2002 - No. 11.iso / Games / WormWars / Install next >
Text File  |  2002-04-07  |  4KB  |  142 lines
  1. ; $VER: Worm Wars 7.0 (8.4.2002)
  2. ; Installer script for Worm Wars
  3. ; © Copyright 2002 Amigan Software
  4. ; Required: Installer 42.9+. Recommended: Installer 44+.
  5.  
  6. (set @app-name ("Worm Wars 7"))
  7. (welcome "Welcome to the Worm Wars 7 installation/uninstallation script!")
  8. (if (>= @installer-version 44)
  9.     (effect "center" "radial" $FFFF00 $0000FF)
  10. )
  11.  
  12. (complete 0)
  13.  
  14. (set #mainchoice
  15.     (askchoice
  16.         (prompt "Would you like to:")
  17.         (choices
  18.             "Install Worm Wars"
  19.             "Uninstall Worm Wars"
  20.         )
  21.         (default 0)
  22.         (help "You don't need to uninstall first before upgrading versions.")
  23.     )
  24. )
  25. (complete 5)
  26.  
  27. (if (= #mainchoice 0)
  28. (   (set #new_dir
  29.         (askdir
  30.             (prompt "Where do you want to install Worm Wars?\n"
  31.             "A drawer called \"WormWars\" will be created.\n")
  32.             (default "SYS:")
  33.             (help "No help needed.")
  34.         )
  35.     )
  36.     (set @default-dest (tackon #new_dir "WormWars"))
  37.     (makedir @default-dest (infos))
  38.     (complete 10)
  39.     (set #dest_parent (tackon "/" #new_dir))
  40.     (copyfiles
  41.         (source "/WormWars.info")
  42.         (dest #dest_parent)
  43.     )
  44.  
  45.     (complete 15)
  46.     (copylib
  47.         (prompt "Installing MEDPlayer.library to LIBS:")
  48.         (help "Worm Wars can use MEDPlayer.library to play music.")
  49.         (source "medplayer.library")
  50.         (dest "LIBS:")
  51.         (confirm)
  52.     )
  53.     (complete 30)
  54.  
  55.     (set #fontchoice
  56.     (askchoice
  57.         (prompt "Would you like to install WormWars.font?")
  58.         (help "Worm Wars can use this 8x8 monospaced font rather than Topaz 8.")
  59.         (choices "Yes" "No")
  60.         (default 0)
  61.     )
  62.     )
  63.     (if (= #fontchoice 0)
  64.     (    (copyfiles
  65.             (source "Fonts/WormWars.font")
  66.         (dest "FONTS:")
  67.         )
  68.         (complete 35)
  69.         (makedir ("FONTS:WormWars"))
  70.         (complete 40)
  71.         (copyfiles
  72.             (source "Fonts/WormWars/8")
  73.             (dest "FONTS:WormWars")
  74.         )
  75.     ))
  76.     (complete 50)
  77.     (copyfiles
  78.         (prompt "Copying other files...")
  79.         (source "")
  80.     (help @copyfiles-help)
  81.     (dest @default-dest)
  82.     (all)
  83.     (infos)
  84.     )
  85.     (complete 75)
  86.     (delete (tackon @default-dest "MEDPlayer.library"))
  87.     (complete 80)
  88.     (delete (tackon @default-dest "WormWars.font"))
  89.     (complete 85)
  90.     (delete (tackon @default-dest "WormWars/8"))
  91.     (complete 90)
  92.     (delete (tackon @default-dest "WormWars"))
  93. ))
  94.  
  95. ;Possible installation enhancements:
  96. ; options as to whether to install the source code
  97.  
  98. (if (= #mainchoice 1)
  99. (
  100.     (set #the_dir
  101.         (askdir
  102.             (prompt "In which drawer is the Worm Wars executable located?")
  103.             (default "PROGDIR:")
  104.             (help "Where is WormWars.exe?")
  105.     )   )
  106.     (set @default-dest (#the_dir))
  107.     (delete
  108.         (@default-dest)
  109.         (all)
  110.         (optional force)
  111.     )
  112.     (complete 65)
  113.     (delete
  114.         ("/WormWars#?")
  115.         (optional force)
  116.     )
  117.     (complete 70)
  118.     (delete
  119.         ("LIBS:MEDPlayer.library")
  120.         (confirm)
  121.         (prompt "About to delete LIBS:MEDPlayer.library...")
  122.         (help "This is self-explanatory.")
  123.     )
  124.     (complete 80)
  125.     (set #fontchoice
  126.         (askchoice
  127.             (prompt "Do you want to delete the Worm Wars font?")
  128.             (help "This font is useful as a general-purpose font.")
  129.             (choices "Yes" "No")
  130.             (default 1)
  131.     )   )
  132.     (complete 90)
  133.     (if (= #fontchoice 0)
  134.     (   (delete ("FONTS:WormWars.font"))
  135.         (delete ("FONTS:WormWars/8"))
  136.         (delete ("FONTS:WormWars"))
  137.     ))
  138. ))
  139.  
  140. (complete 100)
  141. (exit bye)
  142.